Imports Microsoft.VisualBasic

Public Class Bodega
    Private _tipo As String
    Private _refMaterial As ArrayList

    Public Sub New(ByVal tipo As String, ByVal refMaterial As ArrayList)
        Me._tipo = tipo
        Me._refMaterial = refMaterial
    End Sub

    Public Property Tipo() As String
        Get
            Return _tipo
        End Get

        Set(ByVal value As String)
            _tipo = value
        End Set
    End Property

    Public Property RefMaterial() As ArrayList
        Get
            Return _refMaterial
        End Get

        Set(ByVal value As ArrayList)
            _refMaterial = value
        End Set
    End Property

End Class
